home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / HyperCard Demos / Navigator II / AreaCodes / background_2114.txt < prev    next >
Text File  |  1989-01-25  |  3KB  |  173 lines
  1. -- background: 2114 from stack: in
  2. -- bmap block id: 36365
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 0000
  11. -- rect: left=135 top=31 right=47 bottom=171
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 3
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: area code
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 01
  24. -- high flags: 0000
  25. -- rect: left=135 top=53 right=70 bottom=206
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 0
  29. -- font id: 3
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: time zone
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 01
  38. -- high flags: 0000
  39. -- rect: left=135 top=75 right=92 bottom=459
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 0
  43. -- font id: 3
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: region
  48.  
  49.  
  50. -- part 4 (field)
  51. -- low flags: 01
  52. -- high flags: 0000
  53. -- rect: left=55 top=117 right=250 bottom=456
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 0
  57. -- font id: 3
  58. -- text size: 10
  59. -- style flags: 0
  60. -- line height: 13
  61. -- part name: locations
  62.  
  63.  
  64. -- part 8 (button)
  65. -- low flags: 00
  66. -- high flags: 0000
  67. -- rect: left=452 top=302 right=339 bottom=495
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 29114 / 29114
  70. -- text alignment: 1
  71. -- font id: 0
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: Return
  76. ----- HyperTalk script -----
  77. on mouseUp
  78.   visual effect scroll right
  79.   pop card
  80. end mouseUp
  81.  
  82.  
  83.  
  84. -- part 10 (button)
  85. -- low flags: 00
  86. -- high flags: 0000
  87. -- rect: left=255 top=247 right=273 bottom=282
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 1013 / 1013
  90. -- text alignment: 1
  91. -- font id: 0
  92. -- text size: 12
  93. -- style flags: 0
  94. -- line height: 16
  95. -- part name: Next
  96. ----- HyperTalk script -----
  97. on mouseUp
  98.   go to next card
  99. end mouseUp
  100.  
  101.  
  102.  
  103. -- part 11 (button)
  104. -- low flags: 00
  105. -- high flags: 0000
  106. -- rect: left=224 top=247 right=273 bottom=251
  107. -- title width / last selected line: 0
  108. -- icon id / first selected line: 1014 / 1014
  109. -- text alignment: 1
  110. -- font id: 0
  111. -- text size: 12
  112. -- style flags: 0
  113. -- line height: 16
  114. -- part name: Prev
  115. ----- HyperTalk script -----
  116. on mouseUp
  117.   go to prev card
  118. end mouseUp
  119.  
  120.  
  121.  
  122. -- part 12 (button)
  123. -- low flags: 00
  124. -- high flags: 8003
  125. -- rect: left=244 top=32 right=56 bottom=359
  126. -- title width / last selected line: 0
  127. -- icon id / first selected line: 0 / 0
  128. -- text alignment: 1
  129. -- font id: 0
  130. -- text size: 12
  131. -- style flags: 0
  132. -- line height: 16
  133. -- part name: Find a city
  134. ----- HyperTalk script -----
  135. on mouseUp
  136.   global city
  137.   ask "Enter the city or area code to find:"
  138.   put it into city
  139.   if it is not empty then
  140.     find it
  141.     if the result is "Not found" then answer city && "was not found."
  142.   end if
  143. end mouseUp
  144.  
  145.  
  146.  
  147. -- part 13 (button)
  148. -- low flags: 00
  149. -- high flags: 8003
  150. -- rect: left=376 top=32 right=56 bottom=491
  151. -- title width / last selected line: 0
  152. -- icon id / first selected line: 0 / 0
  153. -- text alignment: 1
  154. -- font id: 0
  155. -- text size: 12
  156. -- style flags: 0
  157. -- line height: 16
  158. -- part name: Find next
  159. ----- HyperTalk script -----
  160. on mouseUp
  161.   global city
  162.  
  163.   if city is not empty then
  164.     set lockscreen to true
  165.     go next card
  166.     find city
  167.     set lockscreen to false
  168.   end if
  169.  
  170. end mouseUp
  171.  
  172.  
  173.